home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / Hy-Hyperi / HyperBBS 2.0.cpt / HyperBBS 2.0 / Hyper House / background_6224.xml < prev    next >
Extensible Markup Language  |  1992-07-14  |  6KB  |  174 lines
  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" >
  3. <background>
  4.     <id>6224</id>
  5.     <filler1>0</filler1>
  6.     <bitmap>BMAP_7170.pbm</bitmap>
  7.     <cantDelete> <false /> </cantDelete>
  8.     <showPict> <true /> </showPict>
  9.     <dontSearch> <false /> </dontSearch>
  10.     <link rel="stylesheet" type="text/css" href="stylesheet_4427.css" />
  11.     <part>
  12.         <id>3</id>
  13.         <type>field</type>
  14.         <visible> <true /> </visible>
  15.         <dontWrap> <false /> </dontWrap>
  16.         <dontSearch> <false /> </dontSearch>
  17.         <sharedText> <false /> </sharedText>
  18.         <fixedLineHeight> <true /> </fixedLineHeight>
  19.         <autoTab> <false /> </autoTab>
  20.         <lockText> <true /> </lockText>
  21.         <rect>
  22.             <left>0</left>
  23.             <top>0</top>
  24.             <right>512</right>
  25.             <bottom>24</bottom>
  26.         </rect>
  27.         <style>transparent</style>
  28.         <autoSelect> <false /> </autoSelect>
  29.         <showLines> <false /> </showLines>
  30.         <wideMargins> <false /> </wideMargins>
  31.         <multipleLines> <false /> </multipleLines>
  32.         <reservedFamily> 0 </reservedFamily>
  33.         <titleWidth>0</titleWidth>
  34.         <icon>0</icon>
  35.         <textAlign>center</textAlign>
  36.         <font>New York</font>
  37.         <textSize>18</textSize>
  38.         <textStyle>underline</textStyle>
  39.         <textStyle>bold</textStyle>
  40.         <textHeight>24</textHeight>
  41.         <name>Subject</name>
  42.         <script></script>
  43.     </part>
  44.     <part>
  45.         <id>4</id>
  46.         <type>field</type>
  47.         <visible> <true /> </visible>
  48.         <dontWrap> <true /> </dontWrap>
  49.         <dontSearch> <false /> </dontSearch>
  50.         <sharedText> <false /> </sharedText>
  51.         <fixedLineHeight> <true /> </fixedLineHeight>
  52.         <autoTab> <false /> </autoTab>
  53.         <lockText> <true /> </lockText>
  54.         <rect>
  55.             <left>0</left>
  56.             <top>29</top>
  57.             <right>192</right>
  58.             <bottom>295</bottom>
  59.         </rect>
  60.         <style>scrolling</style>
  61.         <autoSelect> <false /> </autoSelect>
  62.         <showLines> <false /> </showLines>
  63.         <wideMargins> <false /> </wideMargins>
  64.         <multipleLines> <false /> </multipleLines>
  65.         <reservedFamily> 0 </reservedFamily>
  66.         <titleWidth>0</titleWidth>
  67.         <icon>0</icon>
  68.         <textAlign>left</textAlign>
  69.         <font>Monaco</font>
  70.         <textSize>9</textSize>
  71.         <textStyle>plain</textStyle>
  72.         <textHeight>12</textHeight>
  73.         <name></name>
  74.         <script>on mouseUpselect the clickLineput the clickLine into tempput the number of lines in bg field 2 into noOfLinesget word 2 of tempif (it < 0) or (it > noOfLines) then exit mouseUpput it into bg field 3send closeField to bg field 3end mouseUp</script>
  75.     </part>
  76.     <part>
  77.         <id>9</id>
  78.         <type>field</type>
  79.         <visible> <true /> </visible>
  80.         <dontWrap> <true /> </dontWrap>
  81.         <dontSearch> <false /> </dontSearch>
  82.         <sharedText> <false /> </sharedText>
  83.         <fixedLineHeight> <true /> </fixedLineHeight>
  84.         <autoTab> <true /> </autoTab>
  85.         <lockText> <false /> </lockText>
  86.         <rect>
  87.             <left>214</left>
  88.             <top>309</top>
  89.             <right>250</right>
  90.             <bottom>329</bottom>
  91.         </rect>
  92.         <style>shadow</style>
  93.         <autoSelect> <false /> </autoSelect>
  94.         <showLines> <false /> </showLines>
  95.         <wideMargins> <false /> </wideMargins>
  96.         <multipleLines> <false /> </multipleLines>
  97.         <reservedFamily> 0 </reservedFamily>
  98.         <titleWidth>0</titleWidth>
  99.         <icon>0</icon>
  100.         <textAlign>center</textAlign>
  101.         <font>Geneva</font>
  102.         <textSize>12</textSize>
  103.         <textStyle>plain</textStyle>
  104.         <textHeight>16</textHeight>
  105.         <name>Menu choice</name>
  106.         <script>-- editableon closeFieldput the number of lines in bg field 2 into noOfLinesget bg field 3if it is empty thenif the short name of this card is not "Main Menu" thenpop cardelsenotifyUser "You're already at the main menu!"end ifelseput char 1 of it into tempif (charToNum(temp) = 46) thensend mouseUp to bg button "Prior Menu"else if (charToNum(temp) < 49) or (charToNum(it) > 57) thennotifyUser "Pick a number from 1 to " & noOfLines & " only, please!"send openCard to this cardelseif (it > noOfLines) or (it < 1) thennotifyUser "Pick a number from 1 to " & noOfLines & " only, please!"send openCard to this cardelseput word 1 of line it of bg field 4 & " " into goWhereput word 2 of line it of bg field 4 after goWhereif goWhere is "go to" then push cardput line it of bg field 4 into doMedo doMeend ifend ifend ifend closeField</script>
  107.     </part>
  108.     <part>
  109.         <id>10</id>
  110.         <type>field</type>
  111.         <visible> <true /> </visible>
  112.         <dontWrap> <true /> </dontWrap>
  113.         <dontSearch> <false /> </dontSearch>
  114.         <sharedText> <false /> </sharedText>
  115.         <fixedLineHeight> <true /> </fixedLineHeight>
  116.         <autoTab> <false /> </autoTab>
  117.         <lockText> <true /> </lockText>
  118.         <rect>
  119.             <left>199</left>
  120.             <top>29</top>
  121.             <right>512</right>
  122.             <bottom>295</bottom>
  123.         </rect>
  124.         <style>scrolling</style>
  125.         <autoSelect> <false /> </autoSelect>
  126.         <showLines> <false /> </showLines>
  127.         <wideMargins> <false /> </wideMargins>
  128.         <multipleLines> <false /> </multipleLines>
  129.         <reservedFamily> 0 </reservedFamily>
  130.         <titleWidth>0</titleWidth>
  131.         <icon>0</icon>
  132.         <textAlign>left</textAlign>
  133.         <font>Monaco</font>
  134.         <textSize>9</textSize>
  135.         <textStyle>plain</textStyle>
  136.         <textHeight>12</textHeight>
  137.         <name></name>
  138.         <script>-- notThere</script>
  139.     </part>
  140.     <part>
  141.         <id>11</id>
  142.         <type>button</type>
  143.         <visible> <true /> </visible>
  144.         <reserved5> 0 </reserved5>
  145.         <reserved4> 0 </reserved4>
  146.         <reserved3> 0 </reserved3>
  147.         <reserved2> 0 </reserved2>
  148.         <reserved1> 0 </reserved1>
  149.         <enabled> <true /> </enabled>
  150.         <rect>
  151.             <left>412</left>
  152.             <top>0</top>
  153.             <right>512</right>
  154.             <bottom>22</bottom>
  155.         </rect>
  156.         <style>roundrect</style>
  157.         <showName> <true /> </showName>
  158.         <highlight> <false /> </highlight>
  159.         <autoHighlight> <true /> </autoHighlight>
  160.         <sharedHighlight> <true /> </sharedHighlight>
  161.         <family>0</family>
  162.         <titleWidth>0</titleWidth>
  163.         <icon>0</icon>
  164.         <textAlign>center</textAlign>
  165.         <font>Chicago</font>
  166.         <textSize>12</textSize>
  167.         <textStyle>plain</textStyle>
  168.         <name>Unlock Text</name>
  169.         <script>on mouseUp-- notThereif the lockText of bg field 1 is true thenset the name of me to "Lock Text"set the lockText of bg field 1 to falseset the lockText of bg field 2 to falseset the lockText of bg field 4 to falseelseset the name of me to "Unlock Text"set the lockText of bg field 1 to trueset the lockText of bg field 2 to trueset the lockText of bg field 4 to trueend ifend mouseUp</script>
  170.     </part>
  171.     <name>Menu Choices in Fields</name>
  172.     <script>on openCardglobal onLineif onLine then pass openCardelsetabKeyend ifend openCard</script>
  173. </background>
  174.